object FmSevkListe: TFmSevkListe
  Tag = 245
  Left = 133
  Top = 83
  Width = 995
  Height = 500
  Caption = 'S'#305'cak Sevkiyat'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  DesignSize = (
    987
    473)
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 441
    Width = 987
    Height = 32
    Align = alBottom
    Anchors = []
    BevelOuter = bvNone
    TabOrder = 0
    DesignSize = (
      987
      32)
    object bYeni: TButton
      Left = 8
      Top = 6
      Width = 73
      Height = 25
      Caption = 'Yeni'
      TabOrder = 0
      OnClick = bYeniClick
    end
    object Button1: TButton
      Left = 88
      Top = 6
      Width = 73
      Height = 25
      Caption = 'D'#252'zelt'
      TabOrder = 1
      OnClick = Button1Click
    end
    object bIncele: TButton
      Left = 168
      Top = 6
      Width = 73
      Height = 25
      Caption = #304'ncele'
      TabOrder = 2
      OnClick = bInceleClick
    end
    object Blistele: TButton
      Left = 587
      Top = 6
      Width = 73
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'Listele'
      TabOrder = 3
      OnClick = blisteleClick
    end
    object Button4: TButton
      Left = 666
      Top = 6
      Width = 73
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'Kapat [Esc]'
      TabOrder = 4
      OnClick = bkapatClick
    end
  end
  object cxgrid1: TcxGrid
    Left = 0
    Top = 82
    Width = 987
    Height = 359
    Align = alClient
    PopupMenu = PM
    TabOrder = 1
    LookAndFeel.NativeStyle = True
    object cxgrid1DBTableView1: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataModeController.GridMode = True
      DataController.DataSource = DsListe
      DataController.Filter.Active = True
      DataController.Filter.AutoDataSetFilter = True
      DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding]
      DataController.Summary.DefaultGroupSummaryItems = <
        item
          Format = 'Adet : ###.###'
          Kind = skCount
          FieldName = 'bilisno'
        end>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      FilterRow.InfoText = '  '
      FilterRow.Visible = True
      FilterRow.ApplyChanges = fracImmediately
      OptionsBehavior.IncSearch = True
      OptionsData.CancelOnExit = False
      OptionsData.Deleting = False
      OptionsData.DeletingConfirmation = False
      OptionsData.Editing = False
      OptionsData.Inserting = False
      OptionsSelection.CellSelect = False
      OptionsSelection.UnselectFocusedRecordOnExit = False
      OptionsView.ColumnAutoWidth = True
      OptionsView.Indicator = True
      Styles.StyleSheet = dm.tvssDevExpress
      OnColumnHeaderClick = cxgrid1DBTableView1ColumnHeaderClick
      object cxgrid1DBTableView1ID: TcxGridDBColumn
        Caption = 'Sevk No'
        DataBinding.FieldName = 'ID'
        Width = 64
      end
      object cxgrid1DBTableView1TIPIX: TcxGridDBColumn
        Caption = 'Sevk Tipi'
        DataBinding.FieldName = 'TIPIX'
        Width = 70
      end
      object cxgrid1DBTableView1YTARIH: TcxGridDBColumn
        Caption = 'Y'#252'kleme Tarihi'
        DataBinding.FieldName = 'YTARIH'
        Width = 95
      end
      object cxgrid1DBTableView1PLAKADI: TcxGridDBColumn
        Caption = 'Plaka'
        DataBinding.FieldName = 'PLAKADI'
        Width = 82
      end
      object cxgrid1DBTableView1SOFADI: TcxGridDBColumn
        Caption = #350'of'#246'r'
        DataBinding.FieldName = 'SOFADI'
        Width = 98
      end
      object cxgrid1DBTableView1TOPDESI: TcxGridDBColumn
        Caption = 'Y'#252'kl'#252' Desi'
        DataBinding.FieldName = 'TOPDESI'
        Width = 78
      end
      object cxgrid1DBTableView1CTARIH: TcxGridDBColumn
        Caption = #199#305'k'#305#351' Tarihi'
        DataBinding.FieldName = 'CTARIH'
        Width = 95
      end
      object cxgrid1DBTableView1ILKKM: TcxGridDBColumn
        Caption = #199#305'k'#305#351' Km'
        DataBinding.FieldName = 'ILKKM'
        Width = 63
      end
      object cxgrid1DBTableView1GTARIH: TcxGridDBColumn
        Caption = 'Giri'#351' Tarihi'
        DataBinding.FieldName = 'GTARIH'
        Width = 84
      end
      object cxgrid1DBTableView1SONKM: TcxGridDBColumn
        Caption = 'Giri'#351' Km'
        DataBinding.FieldName = 'SONKM'
        Width = 71
      end
      object cxgrid1DBTableView1DOLULUKORANI: TcxGridDBColumn
        Caption = 'Doluluk Oran'#305' (%)'
        DataBinding.FieldName = 'DOLULUKORANI'
        Width = 90
      end
      object cxgrid1DBTableView1Durumu: TcxGridDBColumn
        DataBinding.FieldName = 'Durumu'
        SortIndex = 0
        SortOrder = soAscending
        Width = 83
      end
    end
    object cxgrid1Level1: TcxGridLevel
      GridView = cxgrid1DBTableView1
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 987
    Height = 82
    Align = alTop
    TabOrder = 2
    object Bevel1: TBevel
      Left = 194
      Top = 2
      Width = 190
      Height = 78
    end
    object Label3: TLabel
      Left = 198
      Top = 34
      Width = 27
      Height = 13
      Caption = 'Plaka'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label2: TLabel
      Left = 198
      Top = 10
      Width = 43
      Height = 13
      Caption = #350'of'#246'r Ad'#305
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Bevel2: TBevel
      Left = 2
      Top = 2
      Width = 182
      Height = 78
    end
    object Bittarihl: TLabel
      Left = 16
      Top = 59
      Width = 39
      Height = 13
      Caption = 'Bit.Tarih'
      Transparent = True
    end
    object bastarihl: TLabel
      Left = 16
      Top = 35
      Width = 45
      Height = 13
      Caption = 'Ba'#351'.Tarih'
      Transparent = True
    end
    object Label1: TLabel
      Left = 15
      Top = 10
      Width = 44
      Height = 13
      Caption = 'Tarih Tipi'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Statusul: TLabel
      Left = 198
      Top = 57
      Width = 37
      Height = 13
      Caption = 'Durumu'
      Transparent = True
    end
    object Label5: TLabel
      Left = 390
      Top = 58
      Width = 42
      Height = 13
      Caption = 'Sevk No'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object edPlaka: TwwDBLookupCombo
      Left = 259
      Top = 31
      Width = 120
      Height = 21
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'PLAKA'#9'10'#9'PLAKA'#9'F'#9)
      LookupTable = adoArac
      LookupField = 'ID'
      Navigator = False
      TabOrder = 0
      AutoDropDown = False
      ShowButton = True
      AllowClearKey = False
    end
    object edSoforTan: TwwDBLookupCombo
      Left = 259
      Top = 7
      Width = 120
      Height = 21
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'ADSOYAD'#9'25'#9'ADSOYAD'#9#9)
      LookupTable = adoSofor
      LookupField = 'ID'
      Navigator = False
      TabOrder = 1
      AutoDropDown = False
      ShowButton = True
      AllowClearKey = False
    end
    object bastarihk: TwwDBDateTimePicker
      Left = 72
      Top = 31
      Width = 98
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 2
      DisplayFormat = 'dd.mm.yyyy'
    end
    object Bittarihk: TwwDBDateTimePicker
      Left = 72
      Top = 55
      Width = 98
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 3
      DisplayFormat = 'dd.mm.yyyy'
    end
    object TarSec: TwwDBComboBox
      Left = 72
      Top = 7
      Width = 98
      Height = 21
      ShowButton = True
      Style = csDropDownList
      MapList = True
      AllowClearKey = True
      AutoDropDown = True
      DropDownCount = 8
      ItemHeight = 0
      Items.Strings = (
        'Y'#252'kleme Tarihi'#9'1'
        #199#305'k'#305#351' Tarihi'#9'2'
        'Geli'#351' Tarihi'#9'3')
      ItemIndex = 0
      Sorted = False
      TabOrder = 4
      UnboundDataType = wwDefault
    end
    object durumu: TwwDBComboBox
      Left = 259
      Top = 54
      Width = 121
      Height = 21
      ShowButton = True
      Style = csDropDownList
      MapList = True
      AllowClearKey = True
      AutoDropDown = True
      DropDownCount = 8
      ItemHeight = 0
      Items.Strings = (
        'Y'#252'kleniyor'#9'1'
        'Y'#252'klendi'#9'2'
        'Ara'#231' '#199#305'k'#305#351#9'3'
        'Ara'#231' Giri'#351#9'4'
        'Kapand'#305#9'5')
      Sorted = False
      TabOrder = 5
      UnboundDataType = wwDefault
    end
    object edSevkno: TEdit
      Left = 438
      Top = 55
      Width = 74
      Height = 21
      TabOrder = 6
    end
    object Button5: TButton
      Left = 515
      Top = 55
      Width = 26
      Height = 20
      Caption = 'Bul'
      TabOrder = 7
      OnClick = Button5Click
    end
  end
  object pnl_GirCik: TPanel
    Left = 350
    Top = 163
    Width = 313
    Height = 169
    Anchors = []
    TabOrder = 3
    Visible = False
    DesignSize = (
      313
      169)
    object Label6: TLabel
      Left = 6
      Top = 86
      Width = 24
      Height = 13
      Caption = 'Tarih'
      Transparent = True
    end
    object Label7: TLabel
      Left = 6
      Top = 32
      Width = 27
      Height = 13
      Anchors = [akLeft, akRight, akBottom]
      Caption = 'Plaka'
      Transparent = True
    end
    object lblPlaka: TLabel
      Left = 72
      Top = 31
      Width = 236
      Height = 16
      Alignment = taCenter
      Anchors = [akLeft, akRight, akBottom]
      AutoSize = False
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Transparent = True
    end
    object KM: TLabel
      Left = 6
      Top = 113
      Width = 18
      Height = 13
      Caption = 'Km '
      Transparent = True
    end
    object Label8: TLabel
      Left = 6
      Top = 58
      Width = 42
      Height = 13
      Anchors = [akLeft, akRight, akBottom]
      Caption = 'Sevk No'
      Transparent = True
    end
    object lblSevkno: TLabel
      Left = 72
      Top = 57
      Width = 236
      Height = 16
      Alignment = taCenter
      Anchors = [akLeft, akRight, akBottom]
      AutoSize = False
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Transparent = True
    end
    object lblTarih: TLabel
      Left = 72
      Top = 84
      Width = 236
      Height = 16
      Alignment = taCenter
      Anchors = [akLeft, akRight, akBottom]
      AutoSize = False
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Transparent = True
    end
    object LblFark: TLabel
      Left = 217
      Top = 113
      Width = 91
      Height = 16
      Alignment = taCenter
      Anchors = [akLeft, akRight, akBottom]
      AutoSize = False
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Transparent = True
      Visible = False
    end
    object Panel4: TPanel
      Left = 1
      Top = 137
      Width = 311
      Height = 31
      Align = alBottom
      TabOrder = 0
      object Button2: TButton
        Left = 5
        Top = 5
        Width = 49
        Height = 21
        Caption = 'Kaydet'
        TabOrder = 1
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 258
        Top = 5
        Width = 49
        Height = 21
        Caption = 'Kapat'
        TabOrder = 0
        OnClick = Button3Click
      end
      object DLORANI: TProgressBar
        Left = 86
        Top = 6
        Width = 146
        Height = 21
        TabOrder = 2
      end
    end
    object pnlcaption: TPanel
      Left = 1
      Top = 1
      Width = 311
      Height = 24
      Align = alTop
      Caption = 'Ara'#231' '#199#305'k'#305#351
      Color = clBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
    end
    object edKm: TEdit
      Left = 72
      Top = 110
      Width = 89
      Height = 21
      TabOrder = 1
      OnExit = edKmExit
    end
  end
  object PM: TPopupMenu
    Left = 232
    Top = 160
    object ncele1: TMenuItem
      Caption = #304'ncele'
      OnClick = ncele1Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Dzelt1: TMenuItem
      Caption = 'D'#252'zelt'
      OnClick = Dzelt1Click
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Sil1: TMenuItem
      Action = acSil
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Arakt1: TMenuItem
      Caption = 'Ara'#231' '#199#305'k'#305#351
      OnClick = Arakt1Click
    end
    object DurumGerial1: TMenuItem
      Caption = 'Ara'#231' '#199#305'k'#305#351' Geri Al'
      OnClick = DurumGerial1Click
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object AraGeldi1: TMenuItem
      Caption = 'Ara'#231' Giri'#351
      OnClick = AraGeldi1Click
    end
  end
  object adoListe: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    AfterOpen = adoListeAfterOpen
    AfterScroll = adoListeAfterOpen
    Parameters = <>
    SQL.Strings = (
      'select top 1 C.*,A.PLAKA as Plakadi,S.ADSOYAD as SOFADI,'
      '(case Durum'
      'When '#39'1'#39' then '#39'Y'#252'kleniyor'#39
      'When '#39'2'#39' then '#39'Y'#252'klendi'#39
      'When '#39'3'#39' then '#39'Ara'#231' '#199#305'kt'#305#39
      'When '#39'4'#39' then '#39'Ara'#231' Geldi'#39
      'When '#39'5'#39' then '#39'Kapand'#305#39
      'end) as Durumu'
      ' from CS_TESLIMAT_HAR C'
      'inner Join CS_ARAC_TANIM  A on A.ID=C.ARACID'
      'inner Join CS_SOFOR_TANIM S on S.ID=C.SOFID ')
    Left = 72
    Top = 199
  end
  object DsListe: TDataSource
    DataSet = adoListe
    Left = 72
    Top = 256
  end
  object adoTemp: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tbl_kargotanim where Aktif=1'
      '')
    Left = 820
    Top = 144
  end
  object adoTemp2: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tbl_kargotanim where Aktif=1'
      '')
    Left = 820
    Top = 192
  end
  object adoSofor: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from CS_SOFOR_TANIM where AKTIF=1')
    Left = 232
    Top = 208
  end
  object adoArac: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from CS_ARAC_TANIM where AKTIF=1')
    Left = 232
    Top = 256
  end
  object ActionList1: TActionList
    Left = 696
    Top = 224
    object acSil: TAction
      Caption = 'Sil'
      Enabled = False
      OnExecute = acSilExecute
    end
  end
end
